home *** CD-ROM | disk | FTP | other *** search
/ Mac Easy 2010 May / Mac Life Ubuntu.iso / casper / filesystem.squashfs / usr / lib / perl / 5.10.0 / sys / sysmacros.ph < prev    next >
Encoding:
Text File  |  2009-06-26  |  770 b   |  26 lines
  1. require '_h2ph_pre.ph';
  2.  
  3. no warnings 'redefine';
  4.  
  5. unless(defined(&_SYS_SYSMACROS_H)) {
  6.     eval 'sub _SYS_SYSMACROS_H () {1;}' unless defined(&_SYS_SYSMACROS_H);
  7.     require 'features.ph';
  8.     if(defined(&__GLIBC_HAVE_LONG_LONG)) {
  9.     if(defined (defined(&__GNUC__) ? &__GNUC__ : undef)  && (defined(&__GNUC__) ? &__GNUC__ : undef) >= 2 && defined (defined(&__USE_EXTERN_INLINES) ? &__USE_EXTERN_INLINES : undef)) {
  10.     }
  11.     eval 'sub major {
  12.         my($dev) = @_;
  13.             eval q( &gnu_dev_major ($dev));
  14.     }' unless defined(&major);
  15.     eval 'sub minor {
  16.         my($dev) = @_;
  17.             eval q( &gnu_dev_minor ($dev));
  18.     }' unless defined(&minor);
  19.     eval 'sub makedev {
  20.         my($maj, $min) = @_;
  21.             eval q( &gnu_dev_makedev ($maj, $min));
  22.     }' unless defined(&makedev);
  23.     }
  24. }
  25. 1;
  26.